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A lot certainly has happened since the 
last newsletter. I'm quite sure that TI*s 
announcement took many of us by surprise and 
that by now you have heard all the rumors. I 
won't go over all of them but here are a few 
that are worth mentioning. 

TOYS R US and/or GE are apparently trying 
to obtain the rights to manufacture the TI 
99/4A consoles, software and maybe the 
peripherals. 

The International Users Group is trying 
to obtain the rights to Extended BASIC and 
the Editor/Assembler command modules. 

The 99*er magazine might be adding the 
IBM, Commodore and Atari computers to its' 



A California company by the name of 
CorComp Inc, is manufacturing a 32K memory 
expansion card, an RS232 card, a double 
sided double density Disk Controller card 
and a new peripheral expansion box. The 
cards have a 1 year warranty and are FULLY 
compatible. This same company is working on 
a replacement for the 99/8 computer with 
many more enhancements over its' unreleased 
TI predecessor. From what we have heard so 
far about CorComp 's 99/6^*, which is what if 
may be called, it sounds like it is going to 
be an extremely nice computer for a very 
reasonable price. We will be sure to publish 
more about CorComp 's products In future 
issues. Interested dealers may contact 
CorComp Inc., 23U61 Ridge Route Dr., Suite 
H, Laguna Hills, CA 92653 or phone 714 

855-8033. 

If you are interested in buying some of 

these cards contact ydur local dealer to see 

when they will have them In stock. The 32K 

-card has a suggested retail price of 119*95) 
the RS232 is 79.95 and the disk controller 

^" ould be around 119-95 

A local dealer to us has latched on to one 
heck of a deal for color monitors. He has a 
very nice 13 Inch color monitor that 



Includes the cable for the TI 99/4A and it 
is only 224,95 plus shipping. Re also has a 
working light pen for your TI 99/'!A that he 
is inviting inquires on. We just found out 
about the light pen so we are uncertain 
about the price, but If it is like the rest 
of his products I'm sure you'll like the 
price. If you are interested contact Ron 
Wells at 5523 San Jose, Hontclalr, CA 91763 
or call after 4:00 PM P.S.T. (714) 983-2878. 



Millers Graphics will be publishing' a 
monthly 16 + page newsletter FULL of tips, 
tricks and many undocumented items of 

interest about the 99/4 A and its' 
peripherals. We've been working on detailed 
memory maps of ROM, RAM, VDP RAM and GROM 
which we will be publishing. We have also 
looked at the disk controller card and 
memory dumps of the various command modules, 
through which we have discovered many 
Interesting items that we will be sharing 
with you in future Issues. 

Along with sections on getting the most 
out of Extended BASIC, there will be columns 
on TI Forth, jthe TI PC computer and a 
question and ahswer section where we will 
try to answer all the questions you've had 
but did not know who to ask. 

r 

r 

The items slated for the first issue, 
ifhich will be mailed at the end of January 
are; The start of a continuing series on the, 
detailed memory maps and what you can do 
with the various addresses (PEEKS and 
LOADS). How to change the screen and/or the 
text color In the Immediate or program entry 
mode, without memory expansion! How to get 
into Multicolor and Text modes from Extended 
BASIC! Answers to some of the questions we 
have received regarding Extended BASIC 
programming. An overview of TI Forth and a 
Dice little program that is written in 
Extended BASIC that lets you draw on the 
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screen la all the colors, using the Joystick 
will also be in the first issue. 

Tes, we are still going to publish the 
book we promised in the last newsletter. 
TI's announcement and some new discoveries 
that we want to add to the book have placed 
us behind schedule. We will be sending out 
full color brochures about the book as soon 
as it is complete and ready to ship . 

Please keep sending in the questions they 
help us with on future topics for the 
newsletter! 

That is enough editorial lets move on to 
programming and the other fun stuff. 



Here is a new address for you to play 
with >83C2, it is located in the 256 byte 
area of memory know as Scratch Pad Ram. This 
address is know as the 'Interrupt Flag' and 
it is a 1 byte bit mapped address. 

If you have memory expansion you can turn 
the bits on and off by using the following 
CAtL LOAD'S. Don't forget about CALL INIT. 



Bit 


Use 





On disable all of the following 


1 


On disable Sprite motion 


2 


On disable Auto Sound processing 


3 


On disable the QUIT key (FCTN =) 


^-7 


not used 



>83C2 = decimal 33730 
33730-65536 = -31806 



CALL LOAD( 
CALL LOAD( 
CALL LOADC 
CALL LOAD( 
CALL LOADC 



•31806,128) 
■31806,64) 
■31806,32) 
•31806,16) 
•31806,0) = 



= bit on 
= bit 1 on 
= bit 2 on 
= bit 3 on 
All bits off 



CALL L0AD(-31806,48) = bits 2 & 3 on 
CALL LOAD(-31806,80) = bits 1 & 3 on 
CALL LOAD(-31806,96) = bits 1 & 2 on 

If you type in CALL INIT : : CALL LOAD 
(-31806,16) before ybu start programming you 
won't have to worry about FCTN QUIT ever 
againi If you disable the Auto Sound 
processing after a CALL SOUND statement the 
sound will stay on forever but don't execute 
another CALL SOUND until you turn off bit 2 
or you will lock up your computer and you 
will have to turn it off & on to regain 
control, this includes the beep and honk 
sounds the computer generates for inputs and 
warning sounds. 



Listed below is a little program that 
turns Sprite motion on and off. Even though 
auto Sprite motion is off all the other 
sprite related statements still work, such 
as CALL GOING, CALL LOCATE etc. After you 
have run the program change the color 
parameter in the CALL SPRITE to 7 instead of 



100 GALL INIT :: GALL SCREEN 
(2):: GALL LOADC-31806,64):: 
CALL MAGNIFy(4):: CALL CHAR 
(64,RPT$("F",64)) 



* * 



110 A=10 :: FOR 1=1 TO 10 

CALL SPRITE(#I,64,I+2,I»16, 
110,0,I«A):: NEXT I 



y 



120 RANDOMIZE :: CALL PEEK(- 

31880,B):: IF B<25 THEN GALL 

LOAD(-31806,64):: A=-A :: C 

ALL GOING(#1,#2,30,C)ELSE 12 



130 CALL S0UND(-100,660,(N0T 

C)»-30):; FOR 1=1 TO 10 STE 

P 2 :: CALL MOTION(#I,0,I»A, 

#I+1,0,I»-A):: NEXT I : : CAL 
L L0AD(-31806,0):: GOTO 120 



Tou can also stop sprite motion by 
loading -31878 with and then start them 
back up by loading ^31878 with the highest 
numbered sprite that is in motion. Both 
-31806 and -3I878 work but -31806 brings 
them to a stop a little faster, on the other 
hand, by using -31878 you can selectively 
stop the higher numbered sprites and keep 
the lower numbered sprites in motion. 



Since we are going to be doing a lot of 
talking about PEEK'S in future issues of The 
Smart Programmer here are a few tips on what 
all those numbers are in memory. 

Our computers can access an address as 
either a byte or a word. A byte is a string 
of binary digits (bits). In the majority of 
cases, including the TI 99/4A, a byte is 8 
bits long. A 6-blt byte is commonly called a 
character, not to be confused with the 
characters that are printed on the screen, A 
4-bit byte is usually called a digit or 
nibble. Our bytes are made up of 8 bits and 
a word is 2 bytes or 16 bits, A bit can be 
either on, equal to 1, or off, equal to 0. 
In a byte, the bits are numbered through 
7, with bit being the most significant bit 
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(msb) 
least 

"•t. 



or highest value bit and 7 being the 
significant bit (Isb) or lowest valued 



i 0111 2l3l4{5|6|7i 
I + + + + + + + 1 

I 128 I 64 I 32 I 16 I 8 I 4 1 2 I 1 I 

A byte can also be split In half to form 
a nibble or 4 bits, such as it is for the 
Hex codes in the character definitions. 

00000111 in binary equals 7 in decimal 
and 07 in hex. 00001110 equals 14 in dec. 
and OE In hex. 0001 1 100 equals 28 in dec. 

and 1C in hex. 

When you execute CALL PEEK(xxxx, A,B) , 
both A and B contain one byte in decimal 
form. A and B will always be a value between 
and 255 since 255 is the largest value 
that one 8 bit byte can contain. 128 + 64 + 
32+16+8+4+2+ 1= 255. To convert 
this into a word multiply A times 256 and 

add B to it. 

The following program is a number 
converter. You can input a number in 
decimal, hexadecimal or binary and the 
program will return the number in the other 
^wo number bases. It will also return the 
JEKable decimal. address if the number is 
larger than 32767 as well as displaying the 
number as a word and split into two bytes. 
The conversion formulas were written as 
subroutines so that you could easily use 
them ir any of your other programs. 

Here are the inputs, printouts and 
conversion formulas listed by line number. 

130 Decimal input, range checking and 
subroutine execution. 



140 
150 

160 
170 
180 
190 

200 
220 



Hexadecimal input, range checking 

subroutine execution. 

Binary input, range checking and 

subroutine execution. 
Decimal printout (word and bytes). 
Hexadecimal and Binary printout. 
Hex to Decimal conversion. 
Binary to Decimal conversion. 

& 210 Decimal to Binary conversion. 

& 230 Decimal to Hex conversion. 



and 



100 ON WARNING NEXT :: CALL 
CLEAR :: H$="0123456789ABCDE 
F" :: PRINT "DEPRESS yOOR AL 
PHA LOCK KEY": : "PRESS LETTE 
R FOR INPUT BASE": : 

110 PRINT : :"D=DEC # H=HE 
X # B=BIN #": : :: CALL SO 
UND(80,660,6) 

120 CALL KEY(0,K,S):: IF S<1 
THEN 120 ELSE ON P0S("DHB", 
CHR$(K),1)+1 GOTO 110,130,14 
0,150 

130 INPUT "DEC #=":DEC :: IF 

DEC<-32768 OR DE065536 THE 

N 130 ELSE A,DEC=INT(DEC-655 
36*CDEC<0)):: GOSUB 200 :: G 
OSUB 220 :: GOTO 160 



;» 



140 PRINT "HEX #=" :: ACCEPT 
AT(23,7)BEEP SIZE(4)VALIDAT 
E(H$):HEX$ :: GOSUB 180 :: G 
OSUB 200 :: GOTO 160 



GOTO page 4 



I DON'TWANTTO MISS ASINGLE INFORMATIVE ISSUE OFTHE SMART PROGRAMMER. 




D Yes, please send me a full year of The Smart 
Programmer at the introductory rate of 1 2."*. 



Name 



Address 



City 



State 



Zip 



Country 

Subscriptions must be prepaid in U.S. funds. For 
foreign surface mail add 3" to the subscription rate; 
for foreign airmail add 1 3" to the subscription rate. 



D Yes, I would like to share a year of the Smart 
Programmer with my friends. Please send a 
subscription as my gift to: 



Name 



Address 



City 



State 



.Zip L 



Country 

Mail subscription forms and payment to 

Millers Graphics 
1 475 W. Cypress Ave. 
San Dimas, CA91773 
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150 PRINT "BIN #=" :: ACCEPT 
AT(23,7)BEEP SIZE( 16)VALIDA 
TE(''10"):BIN$ :: GOSUB 190 : 
: GOSUB 220 :: GOSUB 210 



190 FOR 1=1 TO LEN(BIN$):; D 
EC=DEC-2*(I-1)»(SEGi(BIN$,(L 
EN(BIN$) + 1-I),1) = ''l"):: NEXT 
I :: RETURN 






160 A=INT(DEC/256):: PRINT : 
"D=";DEC;TAB(12);A;DEC-A*256 
; : IF DEO32767 THEN PRINT 
" ";DEC-65536 

170 PRINT "H= '';HEX$:«B= ";S 
EG$(BIN*,1,8)&" "ASEG$(BIN$, 
9,8):: HEX$,BIN$="" :: A, DEC 



=0 






GOTO 110 



^ 



180 HEX$=SEG$("0000",1,4-LEN 
(HEX$))4HEX$ :: FOR 1=1 TO 4 
•:: A,DEC=DEC+(POS(H$,SEG$(H 
EX$,I,1),1)-1)«16*(4-I):: NE 
XT I : : RETURN 



200 A=A/2 :: BIN$=STR$(-(A-I 
NT(A)<>0))&BIN$ :: A=INT(A): 
: IF A THEN 200 

210 BIN$=SEG$(RPT$("00",8),1 
,16-LEN(BIN$))&BIN$ :: RETUR 
N 

220 A=DEC+65536*(DEC>32767) 

230 HEX$=SEG$(H$,(INT( A/4096 
)AND 15)+1,1)&SEG$(H$,(INT(A 
/256)AND 15)+1.1)&SEG$CH$,(I 
NT(A/16)AND 15)+1 , 1 )&SEG$(H$ 

,(A AND 15)+1,1):: RETURN 



. * 
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